*Replication file for survey


use "mobility-survey-data.dta"


*FIGURE 2 Distribution of respondent sectors
histogram sector, percent width(1) start(.5) xla(.5(1)21) xlabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med) angle(55)) xtitle("") ytitle("Percent of Sample")

*FIGURE 3 Distributions of the immobility variables: the cost to move (left panel) and the fixed asset share (right panel)
*(A) Cost to move 
twoway hist costtomove, percent width(1) start(.5) xlabel(1 "Not costly" 2 "Somewhat costly" 3 "Very costly", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))

*(B) Fixed assets share
twoway hist fixedassets, percent width(1) start(.5) xlabel(1 "less than 10" 2 "10 to 20" 3 "20 to 30" 4 "30 to 40" 5 "40 to 50" 6 "over 50", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large)) 


*FIGURE 4 Distribution of support for property rights, dependent variable
twoway hist prpostall, percent width(1) start(3) xlabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) ylabel(,labsize(large))

*FIGURE 5 Raw data: support for property rights as a function of the 
*(A) cost to move (left panel) 
twoway scatter prpostall costtomove, jitter(4) color(gray) ytitle("Support for property rights", size(large)) xtitle("Cost to move", size(large)) || scatter prpostallcost costtomove, symbol(circle) color(black) || lfit prpostall costtomove, leg(off)

*(B) fixed asset share (right panel)
twoway scatter prpostall fixedassets, jitter(4) color(gray) ytitle("Support for property rights", size(large)) xtitle("Fixed assets share", size(large)) || scatter prpostallfixed fixedassets, symbol(circle) color(black) || lfit prpostall fixedassets, leg(off)

*TABLE 1: Dependent variable is support for improving property rights
reg prpostall oprev employees i.iso3n costtomove polconn_connection, robust cluster(iso3n)
	estimates store m1
reg prpostall oprev employees i.iso3n i.sector costtomove polconn_connection, robust cluster(iso3n)
	estimates store m2
reg prpostall oprev employees i.iso3n i.industry costtomove polconn_connection, robust cluster(iso3n)
	estimates store m3
reg prpostall oprev employees i.iso3n fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m4
reg prpostall oprev employees i.iso3n i.sector fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m5
reg prpostall oprev employees i.iso3n i.industry fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m6
	
estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")
	 

	 
	 
	 
*********************
******APPENDIX*******	 
*********************
	 
	 
*TABLE A1: Summary statistics 
reg prpostall fixed oprev employees i.iso3n costtomove polconn_connection, robust cluster(iso3n)
estadd mean
estadd sd
estadd summ, max
estadd summ, min
estout, cells("mean sd min max") stats(N) style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n _cons)  ///
	 varlabels(prpostall "Support for property rights" costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections")

summ prpostall	 
*added manually
	 

*FIGURES A1 - A5: Distribution of respondents across sectors in each sample country

histogram sector if country=="Argentina", percent width(1) start(.5) xla(.5(1)21) xlabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med) angle(55)) xtitle("") ytitle("Percent of Sample")

histogram sector if country=="Chile", percent width(1) start(.5) xla(.5(1)21) xlabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med) angle(55)) xtitle("") ytitle("Percent of Sample")

histogram sector if country=="Colombia", percent width(1) start(.5) xla(.5(1)21) xlabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med) angle(55)) xtitle("") ytitle("Percent of Sample")

histogram sector if country=="Mexico", percent width(1) start(.5) xla(.5(1)21) xlabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med) angle(55)) xtitle("") ytitle("Percent of Sample")

histogram sector if country=="Peru", percent width(1) start(.5) xla(.5(1)21) xlabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med) angle(55)) xtitle("") ytitle("Percent of Sample")
	 
	 
*FIGURE A6 Standard deviation in fixed assets across sectors	
twoway scatter sector sectorstddevfe , ytitle("") ylabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med)) xlabel(, labsize(med)) xtitle("Sector Standard Deviation")


*FIGURE A7 Standard deviation in cost to move across sectors	
twoway scatter sector sectorstddevcosttomove , ytitle("") ylabel(1 "Agriculture, forestry, fishing" 2 "Mining and quarrying" 3 "Manufacturing" 4 "Electricity, gas, steam, AC" 5 "Water supply, sewerage, waste" 6 "Construction" 7 "Wholesale and retail trade" 8 "Transportation and storage" 9 "Accommodation and food service" 10 "Information and communication" 11 "Financial and insurance" 12 "Real estate" 13 "Professional, scientific, tech." 14 "Administrative and support" 15 "Public admin., defense, social security" 16 "Education" 17 "Human health and social work" 18 "Arts, entertainment, recreation" 19 "Other service" 20 "Households as employers" 21 "Extraterritorial bodies", labsize(med)) xlabel(, labsize(med)) xtitle("Sector Standard Deviation")


*FIGURES A8 through A12: Distribition of the property rights component variables, dependent variable
twoway hist prpost1, percent width(1) start(.5) ylabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xlabel(1 "Strongly disagree" 2 "Weakly disagree" 3 "Neither agree nor disagree" 4 "Weakly agree" 5 "Strongly agree", angle(45) labsize(large))
twoway hist prpost2, percent width(1) start(.5) ylabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xlabel(1 "Strongly disagree" 2 "Weakly disagree" 3 "Neither agree nor disagree" 4 "Weakly agree" 5 "Strongly agree", angle(45) labsize(large))
twoway hist prpost3, percent width(1) start(.5) ylabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xlabel(1 "Strongly disagree" 2 "Weakly disagree" 3 "Neither agree nor disagree" 4 "Weakly agree" 5 "Strongly agree", angle(45) labsize(large))
twoway hist prpost4, percent width(1) start(.5) ylabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xlabel(1 "Strongly disagree" 2 "Weakly disagree" 3 "Neither agree nor disagree" 4 "Weakly agree" 5 "Strongly agree", angle(45) labsize(large))


*FIGURE A9: Distribution of support for property rights, dependent variable across countries
twoway hist prpostall if country=="Argentina", percent width(1) start(3) xlabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) ylabel(,labsize(large))
twoway hist prpostall if country=="Chile", percent width(1) start(3) xlabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) ylabel(,labsize(large))
twoway hist prpostall if country=="Colombia", percent width(1) start(3) xlabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) ylabel(,labsize(large))
twoway hist prpostall if country=="Mexico", percent width(1) start(3) xlabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) ylabel(,labsize(large))
twoway hist prpostall if country=="Peru", percent width(1) start(3) xlabel(, labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) ylabel(,labsize(large))


*FIGURE A10: Distrbutions of cost to move across countries
twoway hist costtomove if country=="Argentina", percent width(1) start(.5) xlabel(1 "Not costly" 2 "Somewhat costly" 3 "Very costly", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist costtomove if country=="Chile", percent width(1) start(.5) xlabel(1 "Not costly" 2 "Somewhat costly" 3 "Very costly", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist costtomove if country=="Colombia", percent width(1) start(.5) xlabel(1 "Not costly" 2 "Somewhat costly" 3 "Very costly", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist costtomove if country=="Mexico", percent width(1) start(.5) xlabel(1 "Not costly" 2 "Somewhat costly" 3 "Very costly", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist costtomove if country=="Peru", percent width(1) start(.5) xlabel(1 "Not costly" 2 "Somewhat costly" 3 "Very costly", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))


*FIGURE A11: Distrbutions of the share of fixed assets across countries
twoway hist fixedassets if country=="Argentina", percent width(1) start(.5) xlabel(1 "less than 10" 2 "10 to 20" 3 "20 to 30" 4 "30 to 40" 5 "40 to 50" 6 "over 50", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist fixedassets if country=="Colombia", percent width(1) start(.5) xlabel(1 "less than 10" 2 "10 to 20" 3 "20 to 30" 4 "30 to 40" 5 "40 to 50" 6 "over 50", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist fixedassets if country=="Chile", percent width(1) start(.5) xlabel(1 "less than 10" 2 "10 to 20" 3 "20 to 30" 4 "30 to 40" 5 "40 to 50" 6 "over 50", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist fixedassets if country=="Mexico", percent width(1) start(.5) xlabel(1 "less than 10" 2 "10 to 20" 3 "20 to 30" 4 "30 to 40" 5 "40 to 50" 6 "over 50", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))
twoway hist fixedassets if country=="Peru", percent width(1) start(.5) xlabel(1 "less than 10" 2 "10 to 20" 3 "20 to 30" 4 "30 to 40" 5 "40 to 50" 6 "over 50", angle(45) labsize(large)) xtitle("", size(large)) ytitle("Percent of sample", size(large)) xscale(range(1.5 3.25)) ylabel(,labsize(large))


*TABLE A2: Dependent variable is log composite support for improving property rights
gen logprpostall = log(prpostall)

reg logprpostall oprev employees i.iso3n costtomove polconn_connection, robust cluster(iso3n)
	estimates store m1
reg logprpostall oprev employees i.iso3n i.sector costtomove polconn_connection, robust cluster(iso3n)
	estimates store m2
reg logprpostall oprev employees i.iso3n i.industry costtomove polconn_connection, robust cluster(iso3n)
	estimates store m3
reg logprpostall oprev employees i.iso3n fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m4
reg logprpostall oprev employees i.iso3n i.sector fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m5
reg logprpostall oprev employees i.iso3n i.industry fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m6
	
estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")

	 
*TABLE A3: Mobility interacted with rule of law

reg prpostall oprev employees i.iso3n c.costtomove##c.wbgi_rle polconn_connection, robust cluster(iso3n)
	estimates store m1
reg prpostall oprev employees i.iso3n i.sector c.costtomove##c.wbgi_rle polconn_connection, robust cluster(iso3n)
	estimates store m2
reg prpostall oprev employees i.iso3n i.industry c.costtomove##c.wbgi_rle polconn_connection, robust cluster(iso3n)
	estimates store m3
reg prpostall oprev employees i.iso3n c.fixedassets##c.wbgi_rle polconn_connection, robust cluster(iso3n)
	estimates store m4
reg prpostall oprev employees i.iso3n i.sector c.fixedassets##c.wbgi_rle polconn_connection, robust cluster(iso3n)
	estimates store m5
reg prpostall oprev employees i.iso3n i.industry c.fixedassets##c.wbgi_rle polconn_connection, robust cluster(iso3n)
	estimates store m6
	
estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" c.costtomove#c.wbgi_rle "Cost to move $\times$ Rule of law" fixedassets "Fixed assets" wbgi_rle "Rule of law" c.fixedassets#c.wbgi_rle "Fixed assets $\times$ Rule of law" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")

	 
*TABLE A4: Mobility interacted with each country

replace iso3n = 0 if country=="Chile"

reg prpostall oprev employees c.costtomove##i.iso3n polconn_connection, robust cluster(iso3n)
	estimates store m1
reg prpostall oprev employees i.sector i.iso3n##c.costtomove polconn_connection, robust cluster(iso3n)
	estimates store m2
reg prpostall oprev employees i.industry i.iso3n##c.costtomove polconn_connection, robust cluster(iso3n)
	estimates store m3
reg prpostall oprev employees i.iso3n i.iso3n##c.fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m4
reg prpostall oprev employees i.iso3n i.sector i.iso3n##c.fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m5
reg prpostall oprev employees i.iso3n i.industry i.iso3n##c.fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m6
	
estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant" 170.iso3n#c.costtomove "Colombia $\times$ Cost to move" 32.iso3n#c.costtomove "Argentina $\times$ Cost to move" 484.iso3n#c.costtomove "Mexico $\times$ Cost to move" 604.iso3n#c.costtomove "Peru $\times$ Cost to move"  170.iso3n#c.fixedassets "Colombia $\times$ Fixed assets" 32.iso3n#c.fixedassets "Argentina $\times$ Fixedassets" 484.iso3n#c.fixedassets "Mexico $\times$ Fixed assets" 604.iso3n#c.fixedassets "Peru $\times$ Fixedassets" 32.iso3n "Argentina" 170.iso3n "Colombia" 484.iso3n "Mexico" 604.iso3n "Peru")	 

	 
*TABLE A5 - A8: Dependent variable is each component of the composite measure of support for improving property rights

*protection from corruption and gov interference	 
reg prpost1 oprev employees i.iso3n costtomove polconn_connection, robust cluster(iso3n)
	estimates store m1
reg prpost1 oprev employees i.iso3n i.sector costtomove polconn_connection, robust cluster(iso3n)
	estimates store m2
reg prpost1 oprev employees i.iso3n i.industry costtomove polconn_connection, robust cluster(iso3n)
	estimates store m3
reg prpost1 oprev employees i.iso3n fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m4
reg prpost1 oprev employees i.iso3n i.sector fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m5
reg prpost1 oprev employees i.iso3n i.industry fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m6
	
	estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")

*gov do more to combat corruption	 
reg prpost2 oprev employees i.iso3n costtomove polconn_connection, robust cluster(iso3n)
	estimates store m1
reg prpost2 oprev employees i.iso3n i.sector costtomove polconn_connection, robust cluster(iso3n)
	estimates store m2
reg prpost2 oprev employees i.iso3n i.industry costtomove polconn_connection, robust cluster(iso3n)
	estimates store m3
reg prpost2 oprev employees i.iso3n fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m4
reg prpost2 oprev employees i.iso3n i.sector fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m5
reg prpost2 oprev employees i.iso3n i.industry fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m6
	
	estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")
	 
*gov do more to give firms access to free and just legal system 	 
reg prpost3 oprev employees i.iso3n costtomove polconn_connection, robust cluster(iso3n)
	estimates store m1
reg prpost3 oprev employees i.iso3n i.sector costtomove polconn_connection, robust cluster(iso3n)
	estimates store m2
reg prpost3 oprev employees i.iso3n i.industry costtomove polconn_connection, robust cluster(iso3n)
	estimates store m3
reg prpost3 oprev employees i.iso3n fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m4
reg prpost3 oprev employees i.iso3n i.sector fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m5
reg prpost3 oprev employees i.iso3n i.industry fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m6
	
	estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")
	 
*Benefits for companies with political connections create an unfair advantage for certain companies 	 
reg prpost4 oprev employees i.iso3n costtomove polconn_connection, robust cluster(iso3n)
	estimates store m1
reg prpost4 oprev employees i.iso3n i.sector costtomove polconn_connection, robust cluster(iso3n)
	estimates store m2
reg prpost4 oprev employees i.iso3n i.industry costtomove polconn_connection, robust cluster(iso3n)
	estimates store m3
reg prpost4 oprev employees i.iso3n fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m4
reg prpost4 oprev employees i.iso3n i.sector fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m5
reg prpost4 oprev employees i.iso3n i.industry fixedassets polconn_connection, robust cluster(iso3n)
	estimates store m6
	
	estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")


	 
*TABLE A10: Dependent variable is composite support for improving property rights, sample limited to control condition	 
reg prpostall oprev employees i.iso3n costtomove polconn_connection if treatment==0, robust cluster(iso3n)
	estimates store m1
reg prpostall oprev employees i.iso3n i.industry costtomove polconn_connection if treatment==0, robust cluster(iso3n)
	estimates store m2
reg prpostall oprev employees i.iso3n i.sector costtomove polconn_connection if treatment==0, robust cluster(iso3n)
	estimates store m3
reg prpostall oprev employees i.iso3n fixedassets polconn_connection if treatment==0, robust cluster(iso3n)
	estimates store m4
reg prpostall oprev employees i.iso3n i.industry fixedassets polconn_connection if treatment==0, robust cluster(iso3n)
	estimates store m5
reg prpostall oprev employees i.iso3n i.sector fixedassets polconn_connection if treatment==0, robust cluster(iso3n)
	estimates store m6
	
estout m1 m2 m3 m4 m5 m6, style(tex) ///
	 order(costtomove fixedassets polconn_connection employees oprev ) ///
	 drop( *.iso3n *.industry *.sector)  ///
	 cells(b(star fmt(a2)) se(par fmt(a2))) stats(N) starlevels(* 0.10 ** 0.05 *** 0.01) ///
	 varlabels(costtomove "Cost to move" fixedassets "Fixed assets" employees "Number employees" oprev "Operating revenue" polconn_connection "Political connections" _cons "Constant")

	 
